home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 7 / Apprentice-Release7.iso / Source Code / C / Applications / MacPerl 5.1.3 / Mac_Perl_513_src / MacPerl5 / MPScript.h < prev    next >
Encoding:
C/C++ Source or Header  |  1997-01-18  |  908 b   |  37 lines  |  [TEXT/MPS ]
  1. /*********************************************************************
  2. Project    :    MacPerl            -    Real Perl Application
  3. File        :    MPScript.h        -    Handle scripts
  4. Author    :    Matthias Neeracher
  5. Language    :    MPW C
  6.  
  7. $Log: MPScript.h,v $
  8. Revision 1.1  1994/02/27  23:04:28  neeri
  9. Initial revision
  10.  
  11. Revision 0.1  1993/09/16  00:00:00  neeri
  12. Runtime is not particularly fond of AppleEvents
  13.  
  14. *********************************************************************/
  15.  
  16. #ifndef __MPSCRIPT__
  17. #define __MPSCRIPT__
  18.  
  19. pascal void InitPerlEnviron();
  20.  
  21. pascal void DoScriptMenu(short theItem);
  22.  
  23. pascal OSErr DoScript(const AppleEvent *theAppleEvent, AppleEvent *reply, long refCon);
  24.  
  25. pascal Boolean DoRuntime();
  26.  
  27. pascal Boolean GetScriptFilter(CInfoPBPtr pb);
  28.  
  29. #if USESROUTINEDESCRIPTORS
  30. extern RoutineDescriptor    uGetScriptFilter;
  31. #else
  32. #define uGetScriptFilter *(FileFilterUPP)&GetScriptFilter
  33. #endif
  34.  
  35. pascal void AddStandardScripts();
  36.  
  37. #endif